<%@ CODEPAGE=65001 %>
<% Option Explicit %>
<% 'On Error Resume Next %>
<% Response.Charset="UTF-8" %>
<% Response.Buffer=True %>
<% Response.ContentType="application/x-javascript" %>
<!-- #include file="../../../../c_option.asp" -->
<!-- #include file="../../../../function/c_function.asp" -->
<!-- #include file="../../../../function/c_function_md5.asp" -->
<!-- #include file="../../../../function/c_system_lib.asp" -->
<!-- #include file="../../../../function/c_system_base.asp" -->
<!-- #include file="../../../../function/c_system_plugin.asp" -->
<!-- #include file="../../../../function/c_system_event.asp" -->
<!-- #include file="../../../../plugin/p_config.asp" -->
<% Response.Clear %>
<%
Call GetReallyDirectory

Dim strDomain
strDomain = Request.ServerVariables("SERVER_NAME")
'strDomain = Request.ServerVariables("HTTP_HOST")

Dim tmpVerifyCode
tmpVerifyCode = LoadFromFile(BlogPath & "/THEMES/"& ZC_BLOG_THEME &"/PLUGIN/REGISTER/VerifyNumber"&ZC_BLOG_CLSID&".html","utf-8")

Response.Write "var str00='"& ZC_BLOG_HOST &"';var strThemeName='"& ZC_BLOG_THEME &"';var sLoading='正在验证中, 请稍候...';"

If Not MD5(strDomain & Couple_VerifyCode) = tmpVerifyCode Then
%>
$(window).ready(function(){if(GetCookie("Couple_regHint")!=="hidden"){setMark();regAlert("amode");}});
<%
End If

If Err.Number<>0 then
  Call ShowError(0)
End If
%>